Let's Discover Tennessee!/Let's Discover Tennessee!.iso/pc/FILES/DIS.dxr/00423_setHisCat.ls

Text File | 2001-06-27 | 284 b | 18 lines

global currentCategory, totalDone, totalCats

on prepareFrame me
  repeat with i = 49 to 68
    sprite(i).visible = 0
  end repeat
end

on exitFrame
  if totalDone = totalCats then
    go(marker("AllCatsDone"))
  end if
end

on enterFrame me
  currentCategory = "HistoricalSites"
end